home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / GRP_CVTR / REALIZ10 / BOOL.RDR < prev    next >
Text File  |  1994-05-25  |  489b  |  18 lines

  1. * Boolean shapes - Subtracts a spherical hole from a cylinder and colors the
  2. *   result a plastic green. The sphere was colored grey to indicate to REALIZE
  3. *   that it is to be subtracted - otherwise an intersection of the two shapes
  4. *   would result.
  5.  
  6. global
  7.     sky cloudy
  8.     floor tiles
  9.  
  10. insert before_textures begin_insert
  11. #include "rshapes.inc"
  12. end_insert
  13.  
  14. block ELLIPS external Ellipsoid
  15. block DISK_Y external Disk_Y
  16.  
  17. layer 0 intersection layer_texture color green
  18.